on startMovie
  set the centerstage to FALSE
  
  clearGlobals
  set cd = the colordepth
  
  set cd = the colordepth
  if cd > 16 then
    alert "This application requires 16-bit color or less."
    quit
  end if
  
  set its_a_mac = the machineType < 255
  
  if the quickTimePresent <>1 then
    if its_a_mac then
      
      alert "QuickTime system extension required. ¬
Place the QuickTime system extension in your system folder and restart your Macintosh."
    else
      alert "QuickTime DLL's required. ¬
Execute this application from the CD-ROM."
    end if    
    quit
  end if 
  
  set the sound of cast A24 to 0
  set the sound of cast A25 to 0
  set the sound of cast A27 to 0
  
  when mousedown then go to frame "startmovie"
end startMovie  

-- do an offscreen load of a quicktime movie
on osLoad msprite, x, y
  global qtframe, cursprite
  
  set cursprite = msprite
  set cn = the castnum of sprite cursprite
  set the sound of cast cn to 0
  set the MOVIERATE of sprite cursprite = 0
  set the MOVIETIME of sprite cursprite = 1
  puppetSprite cursprite, TRUE
  set the locH of sprite cursprite to x
  set the locV of sprite cursprite to y
  set the sound of cast cn to 1
  updatestage
  set the MOVIETIME of sprite cursprite = 1
  set the MOVIERATE of sprite cursprite = 1
  set qtframe = -1
end osLoad



-- Is the movie still running?
on movieRunning
  global qtframe, cursprite
  
  if the MOVIETIME of sprite cursprite <> qtframe then
    set qtframe = the MOVIETIME of sprite cursprite
    return TRUE
  else
    puppetSprite cursprite, FALSE -- release the movie
    cursor -1   -- get the arrow back
    return FALSE
  end if
end movieRunning